(list-load-path-shadows): Pass proper format string to message.

(list-load-path-shadows): Delete format call inside message.

diff --git a/lisp/emacs-lisp/shadow.el b/lisp/emacs-lisp/shadow.el
index 1280a23a1de08d869b1d146411598bf2c173c90a..686fa9851e6e57050a8ee5e3039e4721faabb70e 100644 (file)
--- a/lisp/emacs-lisp/shadow.el
+++ b/lisp/emacs-lisp/shadow.el
@@ -193,9 +193,9 @@ buffer called `*Shadows*'.  Shadowings are located by calling the
              (insert msg "\n")))
          ;; We are non-interactive, print shadows via message.
          (while shadows
-           (message (format "%s shadows %s" (car shadows) (car (cdr shadows))))
+           (message "%s shadows %s" (car shadows) (car (cdr shadows)))
            (setq shadows (cdr (cdr shadows))))
-         (message msg))))
+         (message "%s" msg))))
 
 (provide 'shadow)